home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 December / PCWorld_2007-12_cd.bin / v cisle / htttrack / httrack-3.41-3.exe / {app} / src / htsinthash.c < prev    next >
Encoding:
C/C++ Source or Header  |  2006-08-15  |  10.2 KB  |  384 lines
  1. /* ------------------------------------------------------------ */
  2. /*
  3. HTTrack Website Copier, Offline Browser for Windows and Unix
  4. Copyright (C) Xavier Roche and other contributors
  5.  
  6. This program is free software; you can redistribute it and/or
  7. modify it under the terms of the GNU General Public License
  8. as published by the Free Software Foundation; either version 2
  9. of the License, or any later version.
  10.  
  11. This program is distributed in the hope that it will be useful,
  12. but WITHOUT ANY WARRANTY; without even the implied warranty of
  13. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14. GNU General Public License for more details.
  15.  
  16. You should have received a copy of the GNU General Public License
  17. along with this program; if not, write to the Free Software
  18. Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  19.  
  20.  
  21. Important notes:
  22.  
  23. - We hereby ask people using this source NOT to use it in purpose of grabbing
  24. emails addresses, or collecting any other private information on persons.
  25. This would disgrace our work, and spoil the many hours we spent on it.
  26.  
  27.  
  28. Please visit our Website: http://www.httrack.com
  29. */
  30.  
  31.  
  32. /* ------------------------------------------------------------ */
  33. /* File: httrack.c subroutines:                                 */
  34. /*       hash table system (fast index)                         */
  35. /* Author: Xavier Roche                                         */
  36. /* ------------------------------------------------------------ */
  37.  
  38. /* Internal engine bytecode */
  39. #define HTS_INTERNAL_BYTECODE
  40.  
  41. #include "htsinthash.h"
  42.  
  43. /* specific definitions */
  44. #include "htsbase.h"
  45. #include "htsmd5.h"
  46. /* END specific definitions */
  47.  
  48. /* Specific macros */
  49. #ifdef NO_MALLOCT
  50. #undef malloct
  51. #undef freet
  52. #undef calloct
  53. #undef strcpybuff
  54. #endif
  55. #ifndef malloct
  56. #define malloct malloc
  57. #define freet free
  58. #define calloct calloc
  59. #define strcpybuff strcpy
  60. #endif
  61.  
  62. // static functions
  63.  
  64. static void inthash_delchain(inthash_chain* hash,t_inthash_freehandler free_handler);
  65. static void inthash_default_free_handler(void* value);
  66. static unsigned long int inthash_key(const char* value);
  67. static void inthash_init(inthash hashtable);
  68.  
  69.  
  70. // inthash -- simple hash table, using a key (char[]) and a value (ulong int)
  71.  
  72. static unsigned long int inthash_key(const char* value) {
  73.   return md5sum32(value);
  74. }
  75.  
  76. int inthash_read_pvoid(inthash hashtable,const char* name, void** pvalue) {
  77.   inthash_value value = INTHASH_VALUE_NULL;
  78.   int ret = inthash_read_value(hashtable, name, (pvalue != NULL) ? &value : NULL);
  79.   if (pvalue != NULL)
  80.     *pvalue = value.ptr;
  81.   return ret;
  82. }
  83.  
  84. int inthash_write_pvoid(inthash hashtable,const char* name, void* pvalue) {
  85.   inthash_value value = INTHASH_VALUE_NULL;
  86.   value.ptr = pvalue;
  87.   return inthash_write_value(hashtable, name, value);
  88. }
  89.  
  90. void inthash_add_pvoid(inthash hashtable, const char* name, void* pvalue) {
  91.   inthash_value value = INTHASH_VALUE_NULL;
  92.   value.ptr = pvalue;
  93.   inthash_add_value(hashtable, name, value);
  94. }
  95.  
  96. // Check for duplicate entry (==1 : added)
  97. int inthash_write(inthash hashtable,const char* name,intptr_t intvalue) {
  98.   inthash_value value = INTHASH_VALUE_NULL;
  99.   value.intg = intvalue;
  100.   return inthash_write_value(hashtable, name, value);
  101. }
  102.  
  103. int inthash_write_value(inthash hashtable,const char* name,inthash_value value) {
  104.   int pos = (inthash_key(name) % hashtable->hash_size);
  105.   inthash_chain* h=hashtable->hash[pos];
  106.   while (h) {
  107.     if (strcmp(h->name,name)==0) {
  108.       /* Delete element */
  109.       if (hashtable->flag_valueismalloc) {
  110.         void* ptr = h->value.ptr;
  111.         if (ptr != NULL) {
  112.           if (hashtable->free_handler)
  113.             hashtable->free_handler(ptr);
  114.           else
  115.             freet(ptr);
  116.         }
  117.       }
  118.       /* Insert */
  119.       h->value=value;
  120.       return 0;
  121.     }
  122.     h=h->next;
  123.   }
  124.   // Not found, add it!
  125.   inthash_add_value(hashtable,name,value);
  126.   return 1;
  127. }
  128.  
  129. // Increment pos value, create one if necessary (=0)
  130. // (==1 : created)
  131. int inthash_inc(inthash hashtable,const char* name) {
  132.   intptr_t value=0;
  133.   int r=0;
  134.   if (inthash_read(hashtable,name,&value)) {
  135.     value++;
  136.   }
  137.   else {    /* create new value */
  138.     value=0;
  139.     r=1;
  140.   }
  141.   inthash_write(hashtable,name,value);
  142.   return (r);
  143. }
  144.  
  145.  
  146. // Does not check for duplicate entry
  147. void inthash_add(inthash hashtable, const char* name, intptr_t intvalue) {
  148.   inthash_value value = INTHASH_VALUE_NULL;
  149.   memset(&value, 0, sizeof(value));
  150.   value.intg = intvalue;
  151.   inthash_add_value(hashtable, name, value);
  152. }
  153.  
  154. void inthash_add_value(inthash hashtable, const char* name, inthash_value value) {
  155.   int pos = (inthash_key(name) % hashtable->hash_size);
  156.   inthash_chain** h=&hashtable->hash[pos];
  157.  
  158.   while (*h)
  159.     h=&((*h)->next);
  160.   *h=(inthash_chain*)calloct(1,
  161.                               sizeof(inthash_chain)
  162.                               +
  163.                               strlen(name)+2
  164.                             );
  165.   if (*h) {
  166.     (*h)->name=((char*)(*h)) + sizeof(inthash_chain);
  167.     (*h)->next=NULL;
  168.     strcpybuff((*h)->name,name);
  169.     (*h)->value=value;
  170.     hashtable->nitems++;
  171.   }
  172. }
  173.  
  174. void* inthash_addblk(inthash hashtable,const char* name,int blksize) {
  175.   int pos = (inthash_key(name) % hashtable->hash_size);
  176.   inthash_chain** h=&hashtable->hash[pos];
  177.  
  178.   while (*h)
  179.     h=&((*h)->next);
  180.   *h=(inthash_chain*)calloct(1,
  181.                               sizeof(inthash_chain)
  182.                               +
  183.                               strlen(name)+2
  184.                               +
  185.                               blksize
  186.                             );
  187.   if (*h) {
  188.     (*h)->name = ((char*)(*h)) + sizeof(inthash_chain);
  189.     (*h)->next=NULL;
  190.     strcpybuff((*h)->name,name);
  191.     (*h)->value.ptr = (void*) ( ((char*)(*h)) + sizeof(inthash_chain) + strlen(name) + 2 );
  192.     hashtable->nitems++;
  193.     return (*h)->value.ptr;
  194.   }
  195.   return NULL;
  196. }
  197.  
  198. int inthash_read(inthash hashtable,const char* name,intptr_t* intvalue) {
  199.   inthash_value value = INTHASH_VALUE_NULL;
  200.   int ret = inthash_read_value(hashtable, name, (intvalue != NULL) ? &value : NULL);
  201.   if (intvalue != NULL)
  202.     *intvalue = value.intg;
  203.   return ret;
  204. }
  205.  
  206. int inthash_read_value(inthash hashtable,const char* name,inthash_value* value) {
  207.   int pos = (inthash_key(name) % hashtable->hash_size);
  208.   inthash_chain* h=hashtable->hash[pos];
  209.   while (h) {
  210.     if (strcmp(h->name,name)==0) {
  211.       if (value != NULL)
  212.         *value=h->value;
  213.       return 1;
  214.     }
  215.     h=h->next;
  216.   }
  217.   return 0;
  218. }
  219.  
  220. int inthash_exists(inthash hashtable, const char* name) {
  221.   return inthash_read_value(hashtable, name, NULL);
  222. }
  223.  
  224. int inthash_remove(inthash hashtable,const char* name) {
  225.   int pos = (inthash_key(name) % hashtable->hash_size);
  226.   inthash_chain** h=&hashtable->hash[pos];
  227.   t_inthash_freehandler free_handler=NULL;
  228.   if ( hashtable->flag_valueismalloc ) {
  229.     if ( hashtable->free_handler )
  230.       free_handler=hashtable->free_handler;
  231.     else
  232.       free_handler=inthash_default_free_handler;
  233.   }
  234.   while (*h) {
  235.     if (strcmp((*h)->name,name)==0) {
  236.       inthash_chain* next;
  237.       if (free_handler) {
  238.         if ((*h)->value.ptr) {
  239.           void* ptr = (*h)->value.ptr;
  240.           if (free_handler)
  241.             free_handler(ptr);
  242.           else
  243.             freet(ptr);
  244.           (*h)->value.ptr=0;
  245.         }
  246.       }
  247.       next=(*h)->next;
  248.       freet(*h);
  249.       *h=next;
  250.       hashtable->nitems--;
  251.       return 1;
  252.     }
  253.     h=&((*h)->next);
  254.   }
  255.   return 0;
  256. }
  257.  
  258. int inthash_readptr(inthash hashtable,const char* name,intptr_t* value) {
  259.   int ret;
  260.   *value = 0;
  261.   ret = inthash_read(hashtable, name, value);
  262.   if (*value == 0)
  263.     ret = 0;
  264.   return ret;
  265. }
  266.  
  267. static void inthash_init(inthash hashtable) {
  268.   unsigned int i;
  269.   for(i=0;i<hashtable->hash_size;i++) {
  270.     hashtable->hash[i]=NULL;
  271.   }
  272. }
  273.  
  274. static void inthash_delchain(inthash_chain* hash,t_inthash_freehandler free_handler) {
  275.   while(hash != NULL) {
  276.     inthash_chain* next=hash->next;
  277.     if (free_handler) {     // pos is a malloc() block, delete it!
  278.       if (hash->value.ptr) {
  279.         void* ptr = hash->value.ptr;
  280.         if (free_handler)
  281.           free_handler(ptr);
  282.         else
  283.           freet(ptr);
  284.         hash->value.ptr=0;
  285.       }
  286.     }
  287.     freet(hash);
  288.     hash=next;
  289.   }
  290. }
  291.  
  292. static void inthash_default_free_handler(void* value) {
  293.   if (value)
  294.     freet(value);
  295. }
  296.  
  297. // --
  298.  
  299. inthash inthash_new(int size) {
  300.   inthash hashtable=(inthash)calloct(1,sizeof(struct_inthash));
  301.   if (hashtable) {
  302.     hashtable->hash_size=0;
  303.     hashtable->flag_valueismalloc=0;
  304.     if ((hashtable->hash=(inthash_chain**)calloct(size,sizeof(inthash_chain*)))) {
  305.       hashtable->hash_size=size;
  306.       inthash_init(hashtable);
  307.     }
  308.     hashtable->nitems = 0;
  309.   }
  310.   return hashtable;
  311. }
  312.  
  313. int inthash_created(inthash hashtable) {
  314.   if (hashtable)
  315.     if (hashtable->hash)
  316.       return 1;
  317.   return 0;
  318. }
  319.  
  320. void inthash_value_is_malloc(inthash hashtable,int flag) {
  321.   hashtable->flag_valueismalloc=flag;
  322. }
  323.  
  324. void inthash_value_set_free_handler(inthash hashtable, t_inthash_freehandler free_handler) {
  325.   hashtable->free_handler = free_handler;
  326. }
  327.  
  328. unsigned int inthash_nitems(inthash hashtable) {
  329.   if (hashtable!= NULL)
  330.     return hashtable->nitems;
  331.   return 0;
  332. }
  333.  
  334. void inthash_delete(inthash* hashtable) {
  335.   if (hashtable) {
  336.     if (*hashtable) {
  337.       if ((*hashtable)->hash) {
  338.         unsigned int i;
  339.         t_inthash_freehandler free_handler=NULL;
  340.         if ( (*hashtable)->flag_valueismalloc ) {
  341.           if ( (*hashtable)->free_handler )
  342.             free_handler=(*hashtable)->free_handler;
  343.           else
  344.             free_handler=inthash_default_free_handler;
  345.         }
  346.         for(i=0;i<(*hashtable)->hash_size;i++) {
  347.           inthash_delchain((*hashtable)->hash[i],(*hashtable)->free_handler);
  348.           (*hashtable)->hash[i]=NULL;
  349.         }
  350.         freet((*hashtable)->hash);
  351.         (*hashtable)->hash = NULL;
  352.       }
  353.       freet(*hashtable);
  354.       *hashtable=NULL;
  355.     }
  356.   }
  357. }
  358.  
  359. // Enumerators
  360.  
  361. struct_inthash_enum inthash_enum_new(inthash hashtable) {
  362.   struct_inthash_enum e;
  363.   memset(&e, 0, sizeof(e));
  364.   e.index = 0;
  365.   e.item = NULL;
  366.   e.table = hashtable;
  367.   return e;
  368. }
  369.  
  370. inthash_chain* inthash_enum_next(struct_inthash_enum* e) {
  371.   inthash_chain* item = NULL;
  372.   if (e != NULL) {
  373.     while(e->item == NULL && e->index < (int) e->table->hash_size) {
  374.       e->item = e->table->hash[e->index];
  375.       e->index++;
  376.     }
  377.     if (e->item != NULL) {
  378.       item = e->item;
  379.       e->item = e->item->next;
  380.     }
  381.   }
  382.   return item;
  383. }
  384.